home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / cachemon.zip / DEV_TAIL.A86 < prev    next >
Text File  |  1990-03-11  |  1KB  |  51 lines
  1. init:
  2.              es mov     in_end_address,offset init
  3.              es mov     in_end_address[2],cs
  4.  
  5.              es mov     status,0100H    ; Set done bit.
  6.                       
  7.              es les     di,in_arg_ptr
  8.  
  9.                 ; parse the arguments
  10.  
  11.                 mov     cx,256
  12.                 mov     al,' '
  13.           repne scasb                   ; find the space at the end of the filename
  14.  
  15.            repe scasb                   ; skip blanks
  16.                 dec     di
  17.  
  18.                 mov     ds,es
  19.                 mov     si,di
  20.                 mov     es,cs
  21.                 mov     di,offset my_name[1]
  22.                 xor     cx,cx
  23.  
  24. l1:             lodsb
  25.                 cmp     al,0d
  26.                 je      done_arg
  27.                 cmp     al,0a
  28.                 je      done_arg
  29.                 cmp     al,0
  30.                 je      done_arg
  31.                 stosb
  32.                 inc     cx
  33.                 cmp     cx,8
  34.                 jb      l1
  35.  
  36. done_arg:
  37.                 mov     ds,es
  38.                 mov     my_name,cl
  39.  
  40.                 call    setup_int13
  41.  
  42.                 mov     dx,Hi_mom
  43.                 mov     ah,09
  44.                 int     021
  45.                 jmp     return
  46. Hi_mom:
  47.                 db      'CACHEMON copyright (c) 1990 D.J. Murdoch',0d,0a
  48.                 db      'Device driver disk access monitor installed.'
  49.                 db      0d,0a,0d,0a,'$' 
  50.  
  51.